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SECTION  1 . INTRODUCTION 


1.1  Purpose  of  the  Validation  SuTimary  Report 

• • 

The  purpose  of  the  Validation  Summary  Report  (VSR)  is  to  identify  individual 
COPOL  language  elements  whose  implementation  does  not  conform  to  American 
National  Standard  Programming  Language  COBOL,  X3.2?-197*t,  and  to  Federal  Stan- 
dard COBOL  as  adopted  from  the  American  National  Standard  by  Federal  Information 
Processing  Standard  21-1  (FIPS  PUB  21-1). 

1.2  Preparation  of  the  VSR 

The  Validation  Summary  Report  is  prepared  by  analyzing  the  results  of  running 
the  COBOL  Compiler  Validation  System  (CCVS).  The  COBOL  Compiler  Validation 
System  consists  of  audit  routines  containing  features  of  Federal  Standard  COBOL, 
their  related  data,  and  an  executive  routine  (VP-routine)  which  prepares  the 
audit  routines  for  compilation.  Each  audit  routine  is  a COBOL  program  which 
includes  many  tests  and  supporting  procedures  indicating  the  result  of  the 
tests. 

The  testing  of  a compiler  in  a particular  hardware/operating  system  environment 
is  accomplished  by  compiling  and  executing  each  audit  routine.  The  report  pro- 
duced by  each  routine  tells  whether  the  compiler  passed  or  failed  the  tests  in 
the  routine.  If  the  compiler  rejects  some  language  elements  by  terminating 
compilation,  giving  fatal  diagnostic  messages,  or  terminating  execution  abnor- 
mally, then  the  test  containing  the  code  the  compiler  was  unable  to  process  is 
deleted  and  the  audit  routine  compilation  and  execution  repeated. 

The  compilation  listings  and  the  output  reports  of  the  audit  routines  con- 
stitute the  raw  data  from  which  the  members  of  the  Federal  COPOL  Compiler 
Testing  Service  produce  a Validation  Summary  Report. 

1.3  Organization  of  the  VSR 

The  Validation  Summary  Report  is  made  up  of  several  sections  the  contents  of 
which  are  described  below. 

a.  Section  2 summarizes  the  results  of  the  compilation  and  execution 
of  the  programs  comprising  the  COPOL  Compiler  Validation  .System.  Section  2 

Is  subdivided  into  a subsection  representing  each  level  of  each  module  defined 
in  American  National  Standard  Programming  language  COPOL,  X?.2?-197*1.  Each 
subsection  contains  a list  of  all  of  the  language  elements  which  must  be 
inplcmented  in  order  to  claim  support  of  that  level/module.  The  list  of 
language  elements  will  be  annotated  to  include  a description  of  both  syntax 
and  semantic  errors  detected  during  the  validation. 

b.  Section  ? - FIPS  PUB  21-1  defines  four  Federal  levels  of  the  COPOL 
Standard,  Section  3.1  of  the  VSR  lists  the  discrepancies  described  in  Section  2 
by  the  Federal  level  in  which  the  problem  occurs.  Section  3.2  lists  discrepan- 
cies for  the  Report  Writer  Module,  which  is  not  a part  of  Federal  Standard 
COPOL. 


c.  Section  contains  information  which  describes  the  softv'are  environ- 
ment in  which  the  compiler  was  tested.-  This  includes  the  name  and  version  of 
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the  operatino:  system;  the  implementor-names  which  were  used  in  the  Environment 
Division  of  the  programs  comprising  the  CCVS;  the  options  used  with  the  com- 
piler; and  if  applicable,  information  regarding  the  use  of  compiler  optimiza- 
tion features. 

\ 

d.  Section  5 contains  the  results  of  the  ASCII  validation.  The  purpose 
of  these  tests  is  to  ascertain  whether  magnetic  tapes  VTitten  in  ASCII  code  and 
with  ANSI  standard  labels,  and  card  decks  with  ASCII  code,  can  be  transported 
between  the  system  being  validated  and  a foreign  computer  system. 

e.  Appendix  A is  the  Validation  Summary  Working  Document,  a working 
paper  resulting  from  the  compilation  and  execution  of  the  CCVS,  and  from  which 
the  VSR  is  derived. 

1.H  Abstract  Covering  Compliance  to  ANS  COBOL 

Definition  of  an  Implementation  of  American  National  Standard  Programming 
Language  COBOL  (excerpts  from  X3.23-197**,  Chapter  1,  Section  1.5). 

An  implementatiop  is  defined  to  meet  the  requirements  of  the  American 
National  Standarei  COBOL  specification  if  that  implementation  includes  a 
fully  implemented  specified  level  of  each  of  the  functional  processing 
modules  and  of  the  Nucleus  as  defined  in  this  Standard.  It  follows  from 
this  that,  in  order  to  [SIC]  meet  the  requirements  of  this  Standard,  an  imple- 
mentation must : 

a.  Not  reouirc  the  inclusion  of  substitute  or  additional  language  ele- 
ments in  the  source  program,  in  order  to  accomplish  any  part  of  the  function 
of  any  of  the  standard  language  elements. 

b.  Accept  all  standard  language  elements  contained  in  a given  level 
of  a module  which  is  specified  as  being  included  in  the  implementation, 
except  as  specifically  exempted  (as  pertaining  to  specific  hardware  components 
for  which  support  is  not  claimed).  See  "Elements  that  Pertain  to  Specific 
Hardware  Components"  below. 

These  points  are  of  particular  pertinence  in  two  areas: 

(1)  There  are  throughout  the  American  National  Standard  COBOL 
specification  certain  language  elements  v'hose  syntax,  or  effect,  is  specified 
to  be,  in  part,  implementor-defined.  While  the  implementor  specifies  the 
constraints  on  that  portion  of  each  element's  syntax  or  rules  that  is  indi- 
cated in  this  Standard  to  be  implementor-defined,  such  constraints  may  not 
include  any  requirement  for  the  inclusion  in  the  source  program  of  sub- 
stitute or  additional  language  elements. 

(2)  When  a function  is  provided  outside  the  source  program  that 
accomplishes  a function  specified  by  any  particular  standard  COBOL  element, 
then  the  implementation  must  not  require,  except  for  Environment  Division 
elements,  the  specification  of  that  external  function  in  place  of  or  in 
addition  to  that  standard  language  element: 

The  following  qualifications  apply  to  the  American  National  Standard  COBOL 
specification: 

a.  Tliere  are  certain  language  elements  which  pertain  to  specific  types 
of  hardware  components.  In  order  for  an  implementation  to  meet  the  require- 
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Bpnts  of  this  standard,  the  implementor  must  specify  the  minimum  hardware 
k ■ configuration  required  for  that  implementation  and  the  hardware  components 

that  it  supports.  Further,  when  support  is  thus  claimed  for  a specific  hard- 
ware component,  all  standard  language  elements  that  pertain  to  that  component 
] must  be  implemented  if  the  module  in  v^hich  they  appear  is  included  in  the 
implementation.  Language  elements  that  pertain  to  specific  hardware  com- 
ponents for  which  support  is  not  claimed,  need  not  be  implemented.  However, 
the  absence  of  such  elements  from  an  implementation  of  American  National 
Standard  COBOL  must  be  specified. 

b.  An  implementation  of  American  National  Standard  COBOL  may  include 
the  ENTER  statement  or  not,  at  the  option  of  the  implementor. 

c.  An  implementation  that  includes,  in  addition  to  a specified  level  of 
each  of  the  functional  processing  modules  and  of  the  Nucleus,  elements  or 
functions  that  either  are  not  defined  in  the  American  National  Standard  COBOL 
specification  or  are  defined  in  a given  level  of  a standard  module  not  other- 
wise included  in  the  implementation,  meets  the  requirements  of  this  Standard. 
This  is  true  even  though  it  may  imply  the  extension  of  the  list  of  reserved 
words  by  the  implementor,  and  prevent  proper  compilation  of  some  programs  that 
meet  the  reouirements  of  this  Standard.  The  implementor  must  specify  any 
optional  language  (languaee  not  defined  in  a specified  level  but  defined  else- 
where in  the  Standard)  or  extensions  (language  elements  or  functions  not 
defined  in  this  Standard)  that  are  included  in  the  implementation. 

d.  In  general,  the  American  ?Jational  Standard  COBOL  specification 
specifies  no  upper  limit  on  such  things  as  the  number  of  statements  in  a pro- 
gram, the  number  of  op^'rands  permitted  in  certain  statements,  etc.  It  is 
recognlxed  that  these  limits  will  vary  from  one  Implementation  of  American 
National  Standard  COBOL  to  another  and  may  prevent  the  proper  compilation  of 
some  programs  that  meet  the  reouir?ments  of  this  standard. 

IKPLEKEHTOR-DEFINED  LANGUAGE  SPECIFICATIONS 

The  language  elements  in  the  following  lists  depend  on  implementor  defini- 
tions to  complete  the  spccificaton  of  the  syntax  or  rules  for  the  elements. 

The  elements  whose  syntax  is  partly  implementor-defined  are: 

Element  Implementor-Defined  Aspect 


SOURCE-COKPUTER  paragraph 
OBJECT-COMPUTER  paragraph 
MEMORY  SIZE  clause 
alphabet-name 

SPECIAL-NAMES  paragraph 
ASSIGN  clause 
VALUE  OF  clause 

j 


computer-name 

computer-name 

integer 

implementor-name;  whether  imple- 
mentor-names are  provided. 

impl ementor-name 

implementor-name 

implementor-name;  whether  implementor- 
names  are  provided. 
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I • RERUN  clause  . 

I 

I 

CALL  and  CANCEL  statements 

COPY  statement 

ENTER  statement 
Margin  F 
Area  E 

Qualification 

The  elements  whose  effect  is  partly 
Element 

alphabet-name 

implementor-name  switches 

USAGE  IS  COMPUTATIONAL 
clause 

USAGE  IS  INDEX  clause 

SYNCHRONIZED  clause 

ACCEPT  statement 

DISPLAY  statement 

Numeric  test 

Comparison  of  nonnumeric  items 

i Arithmetic  expressions 


implementor-name  and  the  form;  the 
implementor  provides  at  least  one 
of  seven  specified  forms. 

relationship  between  operand  and  the 
referenced  program. 

relationship  between  library-name 
text-name,  and  the  library. 

language- name 

The  location. 

The  number  of  character  positions. 

The  number  of  qualifiers;  at  least 
five  must  be  supported. 

implementor-defined  are: 

Implementor-Defined  Aspect 


The  correspondence  between  native  and 
foreign  character  sets. 

Whether  setting  can  change  during 
execution. 

Representation  and  whether  automatic 
alignment  occurs. 

Representation  and  whether  automatic 
alignment  occurs. 

Whether  implicit  FILLER  positions  are 
generated;  their  effect  on  the  size 
of  group  items  and  redefining  items. 

Maximum  size  of  one  transfer  of  data 
in  Level  1 Nucleus. 

Maximum  size  of  one  transfer  of  data 
in  Level  1 Nucleus. 

Representation  of  valid  sign  in  the 
absence  of  the  SIGN  IS  SEPARATE 
clause . 

Collating  sequence,  where  NATIVE  or 
implementor-name  collating  sequence 
is  implicitly  or  explicitly 
specified . 

Number  of  places  carried  for  inter- 
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mediate  results. 

Elements  That  Pertain  to  Specific  Hardware  Components 

The  standard  lan^ua^e  elements  in  the  list  that  follows  pertain  to  specific 
types  of  hardware  components.  These  lanii:ua(?e  elements  must  be  implemented 
in  an  implementation  of  American  National  Standard  CCROL  when  support  'is 
claimed,  by  the  implementor,  for  the  specific  types  of  hardware  components  to 


which  they  pertain,  and  the  module  in 
that  implementation. 

Element 

CODE -SET  clause 

MULTIPLE  FILE  TAPE  clause 
CLOSE. . . REEL/UHIT  statement 
CLOSE... KO  REWIND  statement 
OPEN. . . REVERSED  statement 

OPEN... NO  REWIND  statement 

OPEN...I-0  statement 
(Seouential  I-O  only) 

OPEN  EXTEND  statement 

REWRITE  statement 

(Sequential  I-O  only) 

SEND... BEFORE/ AFTER 
ADVANCING  statement 

USE... 1-0  (Seouential 
I-O  only) 

WRITE... PEFCRE/AFTEP 
ADVANCING 


which  they  are  defined  is  included  in 
Hardware  Component 


Device  capable  of  supporting  the 
specified  code. 

Reel 

Reel  or  mass  storage 

Reel  or  mass  storage 

Reel  with  the  capability  of  makini? 
records  available  in  the  reversed 
order;  mass-storage  with  the  cap- 
ability of  making  records  avail- 
able in  the  reversed  order. 

Reel  or  mass  storage 

Mass  storage 

Reel  or  mass  storage 

Mass  storage 

Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  action 
based  on  mnemonic-names. 

Mass  storage 

Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  action 
based  on  mnemonic-name. 
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1.5  The  Federal  COBOL  Standard 


The  COBOL  compiler  validation  results  enclosed  in  this  document  reflect  the 
degree  to  which  the  subject  COBOL  compiler  implements  the  Federal  COBOL 
Standard.  The  Federal  COBOL  Standard  is  essentially  the  same  as  the 
American  National  Standard  Programming  Language  COBOL,  X?. 23-197^,  with  two 
exceptions: 

The  Federal  COBOL  Standard  defines  levels  and  the  ANSI 
Standard  defines  only  the  minimum  COBOL  implementation  and 
the  full  standard.  Low  and  High  levels  of  the  Federal 
COBOL  Standard  (see  1.5.1)  correspond  to  the  above  two  ANSI 
levels  (minus  the  Report  Writer  module).  Two  additional 
levels,  low-intermediate  and  high- intermediate  have  been 
included  in  the  Federal  Standard  between  the  highest  and 
lowest  subsets.  These  additional  levels  accommodate 
hardware  which  cannot  support  the  full  standard,  but  which 
is  capable  of  implementing  more  than  the  minimum  standard. 

The  Federal  COBOL  Standard  states  that  the  Report  Writer  Module 
is  not  mandatory  in  any  Federal  level,  but  that  the  specifica- 
tions contained  in  X?.2?-1P7*»  should  be  used  to  the  extent 
practical,  consistent  with  requirements. 

The  Federal  COBOL  Standard  reouires  that  a compiler  contain  as  a minimum  the 
elements  specified  in  at  least  one  of  the  Federal  levels.  No  restrictions  are 
imposed  on  the  inclusion  of  selected  features  from  higher  levels  or  even  unique 
vendor  extensions.  Compatibility  amoung  various  implementations  of  a given 
level  containing  additional  features  must  be  controlled  by  management  imposed 
standards  and  restrictions. 

1.5.1  Federal  Standard  COBOL  Levels 

a.  Federal  Standard  COBOL  specifications  are  the  language  specifications 
contained  in  American  National  Standard  Programming  Language  COBOL,  X3. 23-197**. 
For  purposes  of  the  Federal  Standard,  the  modules  defined  in  X3. 23-197**  are 
combined  into  four  levels.  Not  all  computers  are  large  enough  to  accommodate  a 
COBOL  compiler  containing  the  full  ANSI  Standard.  Therefore,  the  Federal 
Government  requires  that  all  compilers  acquired  by  its  agencies  contain  as  a 
minimum  one  of  the  four  Federal  levels,  depending  on  machine  size,  configuration 
and  user  needs.  The  knowledge  that  all  computers  will  support  at  least  one  of 
these  four  subsets  simplifies  the  task  of  developing  machine-independent  COBOL 
programs. 

b.  The  four  levels  of  Federal  Standard  COBOL  are  identified  as:  Low, 
Low-Intermediate,  High-Intermediate,  and  High.  Each  Federal  Standard  COBOL 
level  is  composed  of  either  the  high  or  low  levels  of  the  nucleus  and  ten  of 
the  eleven  Functional  Processing  Modules  (FPMs)  defined  in  X3.2’-197**. 

The  four  Federal  Standard  COBOL  levels  are  reflected  in  the  following  table. 

The  numbers  in  the  table  refer  to  the  level  within  the  FPM  or  nucleus  as 
designated  in  X?. 23-197**,  and  a dash  in  the  table  denotes  that  the  corres- 
ponding FPM  is  omitted. 
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Low 

Level 

Low 

Inter- 

mediate 

Level 

High 

Inter- 

mediate 

Level 

High 

Level 

NUCLEUS 

1 

1 

2 

2 

FPMs 

TABLE  HANDLING 

1 

1 

2 

2 

SEOUENTIAL  I-O 

1 

1 

2 

2 

RELATIVE  I-O 

- 

1 

2 

2 

INDEXED  I-O 

-e 

- 

- 

2 

SORT-MERGE 

- 

- 

1 

2 

REPORT  WRITER 

- 

- 

- 

- 

SEGMENTATION 

- 

1 

1 

2 

LIBRARY 

• 

1 

1 

2 

DEBUG 

- 

1 

2 

2 

INTER-PROGRAM 

COMMUNICATION 

- 

1 

2 

2 

COMMUNICATION 

- 

- 

2 

2 

1.5.2  Conformance  to  Federal  Standard  COPOL 

A compiler  implemented  in  conformance  to  Federal  Standard  COPOL  must  meet  at 
least  the  following:  requirements. 

a.  The  implementation  must  include  all  of  the  language  elements  of  at 
least  one  of  the  levels  of  Federal  Standard  COBOL. 

b.  The  Implementation  must  meet  all  of  the  requirements  defined  in 
American  National  Standard  COPOL,  X?.2?-197^,  Section  I,  paragraph  1.*;,  Defini- 
tion of  An  Implementation  of  American  National  Standard  COPOL  which  is  pro- 
vided in  section  1.1»  of  this  VSR. 

c.  The  implementation  must  provide  a facility  for  the  user  to  optionally 
specify  a level  of  Federal  Standard  COBOL  for  monitoring  his  source  program 
at  compile  time.  The  monitoring  will  be  an  analysis  of  the  syntax  used  in  a 
source  program  against  the  syntax  included  in  the  specified  level  of  Federal 
Standard  COBOL.  Any  syntax  used  in  the  source  program  that  does  not  conform 
to  that  allowed  by  the  user  selected  level  of  Federal  Standard  COBOL  will  be 

j diagnosed.  The  syntax  diagnosed  as  not  conforming  to  the  specified  level  will 

j be  identified  to  the  user  through  a diagnostic  message  on  the  source  program 

{ listing.  The  diagnostic  message  will  contain,  at  least:  (1)  The  identification 

j of  the  source  program  line  number  in  which  the  nonconforming  syntax  occurs, 

I . (2)  the  Identification  of  the  level  of  Federal  Standard  COBOL  that  supports 

; the  syntax  or  that  the  syntax  is  nonstandard  COBOL. 

1.6.  Use  of  the  VSR 

I The  Federal  COBOL  Compiler  Testing  Service  may  make  full  and  free  public 

f 
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1 

1 

Low 

Level 

Low 

Inter- 

mediate 

Level 

High 

Inter- 

mediate 

Level 

High 

Level 

NUCLFUS 

1 

1 

2 

2 

FPMs 

TABLE  HANDLING 

1 

1 

2 

2 

SEQUENTIAL  I-O 

1 

1 

2 

2 

RELATIVE  I-O 

- 

1 

2 

2 

INDEXED  I-O 

- 

- 

2 

SORT-MERGE 

- 

• 

1 

2 

REPORT  WRITER 

- 

- 

- 

• 

SEGMENTATION 

- 

1 

1 

2 

LIBRARY 

- 

1 

1 

2 

DEBUG 

- 

1 

2 

2 

INTER-PROGRAM 

COMMUNICATION 

- 

1 

2 

2 

COMMUNICATION 

■ 

2 

2 

1.5.2  Confurmancr  to  Federal  Standard  COPOL 

A compiler  implemented  in  conformance  to  Federal  Standard  COPCL  must  meet  at 
least  the  following:  recuirenents. 

a.  The  implementation  must  include  all  of  the  language  elements  of  at 
least  one  of  the  levels  of  Federal  Standard  COPOL. 

b.  The  implementation  must  meet  all  of  the  requirements  defined  in 
American  National  Standard  COPOL,  X?.2?-197^,  Section  I,  paragraph  1.S,  Defini- 
tion of  An  Implementation  of  American  National  Standard  COBOL  which  is  pro- 
vided in  section  I.U  of  this  VSR. 

c.  The  implementation  must  provide  a facility  for  the  user  to  optionally 
specify  a level  of  Federal  Standard  COBOL  for  monitoring  his  source  program 

at  compile  time.  The  monitoring  will  be  an  analysis  of  the  syntax  used  in  a 
source  program  against  the  syntax  included  in  the  specified  level  of  Federal 
Standard  COBOL.  Any  syntax  used  in  the  source  program  that  does  not  conform 
to  that  allowed  by  the  user  selected  level  of  Federal  Standard  COBOL  will  be 
diagnosed.  The  syntax  diagnosed  as  not  conforming  to  the  specified  level  will 
be  identified  to  the  user  through  a diagnostic  message  on  the  source  program 
listing.  The  diagnostic  message  will  contain,  at  least;  (1)  The  identification 
of  the  source  program  line  number  in  which  the  nonconforming  syntax  occurs, 

(2)  the  identification  of  the  level  of  Federal  Standard  COBOL  that  supports 
the  syntax  or  that  the  syntax  is  nonstandard  COBOL. 

1.6.  Use  of  the  VSR 

I The  Federal  COBOL  Compiler  Testing  Service  may  make  full  and  free  public 

i 


7 


■4 


disclosure  of  the  Validation  Summary  Report  (VSR)  in  accordance  with  the 
' "Freedom  of  Information  Act"  (5  U.S.C.  A552).  The  results  of  the  validation 
are  only  for  the  purpose  of  satisfying  United  States  Government  requirements, 
and  apply  only  to  the  computer  system,  oprratini?  system  release,  and  compiler 
’ version  identified  in  the  VSR. 

The  COBOL  Compiler  Validation  System  is  used  to  determine,  insofar  as. is 
practical,  the  de<?ree  to  which  the  subject  compiler  conforms  to  the  COBOL 
Standard.  Thus,  the  VSR  Ls  necessarily  discretionary  and  Judgmental.  The 
United  States  Government  does  not  represent  or  warrant  that  the  statements, 
or  any  one  of  them,  set  forth  in  the  VSR  are  accurate  or  complete.  The  VSR 
is  not  meant  to  be  used  for  the  purpose  of  publicizing  the  findings  summarized 
therein. 

1.7  Sources  of  Additional  Information 

FIPS  PUB  21-1  defines  the  Federal  COBOL  Language  Standard.  This  publication 
is  available  from  the  Office  of  ADP  Standards  pianagement.  National  Bureau  of 
Standards,  Washington,  D.  C. , 20??U. 

The  detailed  COBOL  language  specifications  are  given  in  the  publication 
"American  National  Standard  Programming  Language  COBOL,  X?.2?-197tt" , available 
from  the  American  National  Standards  Institute,  1430  Broadway,  New  York,  New 
York  10018. 

An  explanation  of  the  COEOI.  Compiler  Validation  System  is  contained  in  the 
cevs  User's  Guide.  This  document  explains  how  to  run  the  compiler  validation 
system.  The  User's  Guide  and  a magnetic  tape  containing  a copy  of  the  CCVS 
programs  are  available  from  the  National  Technical  Information  Service, 
Springfield,  Virginia,  22151.  (Ordering  information  can  be  obtained  from 
the  Federal  COBOL  Compiler  Testing  Service.) 

1.8.  Requests  for  Interpretation 

Questions  regarding  this  VSR  or  the  CCVS  in  general  should  be  forwarded  to  the 
FCCTS.  If  any  problem  cannot  be  adequately  resolved  through  the  FCCTS,  the 
request  for  interpretation  will  be  forwarded  to  the  Federal  COBOL  Interpretation 
Committee  for  final  resolution. 

A brochure  describing  the  validation  process  including  the  procedures  for 
requesting  a validation  and  resolution  of  questions  involving  interpretation 
of  the  current  Federal  Standard  is  available  from  the  Department  of  the  Navy, 
Federal  COBOL  Compiler  Testing  Service,  Washington,  D.C.  20’76. 


1.9  Modules  and  Language  Elements  Excluded  from  Testing 

During  an  official  validation,  certain  CCVS  tests  may  not  be  used,  and  certain 
facilities  provided  by  the  subject  compiler  may  not  be  tested. 

1.9.1  Federal  Standard  COBOL  Approved  Interpretations 

The  National  Bureau  of  Standards  published  in  the  Federal  Register  Vol.  41 
No.  179 1 September  14,  1976,  an  approved  interpretation  of  Federal  Standard 
COBOL  as  pertains  to  the  evaluation  of  arithmetic  expressions  in  the  COMPUTE 
statements.  This  Interpretation  states  that  "size  of  the  intermediate  result 
field  is  implementor-defined." 


Since  the  results  of  evaluating  arithmetic  expressions  are  not  predictable,  all 
COMPUTE  statements  and  IF  statements  containing  arithmetic  expressions  have 
been  removed  from  the  COBOL  Compiler  Validation  System. 

1.9.2  Report  Writer  Module 

FIPS  PUB  21-1  excludes  the  Report  Writer  Module  from  the  Federal  COBOL  Standard. 
However,  the  Report  Writer  Module  is  still  tested  during  a validation  if  support 
for  that  module  is  claimed  by  the  compiler  vendor. 

1.9. ?  Communication  Module 

Although  it  is  part  of  Federal  Standard  COBOL  as  defined  by  FIPS  PUB  21-1,  the 
Communication  Module  is  not  currently  tested  in  the  course  of  an  official  vali- 
dation for  two  specific  reasons.  First,  a large  volume  of  requests  for  inter- 
pretation on  this  module  have  been  submitted  to  the  cognizant  ANSI  committee 
(X3J*1)  for  resolution.  Secondly,  facilities  for  testing  were  insufficient  to 
determine  the  validity  of  the  Communication  Module  test  programs  during  the 
development  of  CCVST^. 

1.9. ^  Vendor  Omissions  or  Extensions 

Language  elements  are  not  tested  which  have  been  legitimately  omitted  from  the 
Implementation  by  the  implementor  (refer  to  1.^).  Additionally,  no  implementor 
extensions  to  the  standard  COBOL  language  are  tested  in  any  way. 


1.10  Timeliness  of  the  Validation  5u'nmary  Reports 

The  timeliness  of  the  Validation  .Summary  Report  is  important.  Compilers 
and  their  related  operatln«?  system  software  are  modified  several  tines  a year. 
The  Compiler  Validation  System  used  to  validate  compilers  is  also  updated 
during;  the  life  of  the  system.  Therefore  to  ensure  that  the  latest  version 
of  both  the  vendor's  compiler  and  the  Validation  System  are  the  latest  offici- 
ally released  versions,  check  with  the: 

Director 

Federal  COBOL  Compiler  Testini^  Service 
Department  of  the  Navy 
Washington,  D.  C.  20?76 
(202)  697-12*17 

Please  use  the  Validation  Summary  Report  number  of  this  report  when 
corresponding  with  the  Testing  Service. 
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SECTION  2.  DETAILED  EVALUATION  OF  ERROPS. 


I 

This  section  summarizes  the  results  of  the  compilation  and  execution  of  the 
prop,rams  comprisin,^  the  COPOL  Compiler  Validation  System  (CCVS).  The  version 
of  the  CCVS  used  during?  this  validation  is  shown  inside  the  front  cover  of  the 
VSR. 

Section  2 is  made  up  of  a variable  number  of  subsections.  The  number  of  sub- 
sections is  dependent  on  the  Level  of  Federal  COPOL  bcinR  validated.  There  will 
be  a subsection  for  each  level  of  each  module  which  is  validated.  If  the  his'h 
level  of  a module  is  validated  then  there  will  be  two  subsections  for  that 
nodule;  one  for  the  low  level  and  one  for  the  hi»^h  level. 

A validation  of  the  low  level  of  Federal  Standard  COPOL  would  result  in  three 
subsections  being  present.  One  for  Nucleus  level  1,  one  for  Seouential  I-O 
level  1,  and  one  for  Table  Handline  level  1. 

Each  error  or  deviation  noted  in  this  section  makes  reference  to  a program  or 
functional  COBOL  module  contained  in  Appendix  A (Validation  Summary  Working 
Document) . This  reference  provides  the  documented  results  of  an  occurrence 
of  errors/deviataions  detected  during  th»  running  of  the  CCVS  using  the  compiler 
within  the  environment  identified  within  this  document.  The  Validation  Summary 
Working  Document  is  presented  in  sequence  by  functional  module,  functional 
nodule  level  and  program  number  as  defined  below. 

Each  program  in  the  COBOL  Compiler  Validation  System  is  identified  by  a 
character  program  name.  The  name  associates  the  routine  with  the  functional 
processing  module  and  level  of  American  National  Standard  Programming  Language 
COBOL  tested  within  the  program. 

The  five  character  name  has  the  general  format  XXNKM.  The  first  two 
characters  are  alphabetic  and  identify  the  functional  module  tested  by 
the  program.  The  permissable  values  are: 

NC  - Nucleus 

TH  - Table  Handling, 

SO  - Seouential  I-O 
RL  - Relative  I-O 
IX  - Indexed  I-O 
ST  - Sort-Merge 
RW  - Report  Writer 
SG  - Segmentation 
LB  - Library 
DP  - Debug 

IC  - Inter-Program  Communication 
CM  - Communication 

The  third  character  of  the  audit  routine  name  is  either  a 1 or  2,  and 
identifies  the  level  of  the  functional  module  being  tested.  Each  module  and 
level  is  represented  by  several  programs.  The  fourth  and  fifth  characters  of 
the  program  name  are  seouence  numbers  for  programs  which  test  features  in  the 
same  level  of  the  same  functional  processing  module. 

As  an  example,  the  program  name  NC210  is  the  tenth  program  in  the  series  of 
routines  which  test  the  second  level  of  the  Nucleus  module. 


s 

\ 


Description  of  Section  ?. 

Each  error/deviation  is  noted  by  nunber  in  the  left  hand  margin  opposite 
the  lanp.ua^e  element  in  question.  This  number  Is  used  in  section  ? to 
categorize  errors  by  Federal  level  (See  1.S.1).  Inserted  directly  below 
the  language  element  is  a brief  description  of  the  error.  To  the  rlKht  of 
the  langaugc  element  is  a paRe  reference  to  X3.2?-1974,  American  National 
Standard  Programming  Languame  CCPOL.  The  reference  at  the  end  of  the 
description  of  the  error  is  to  Appendix  A which  contains  the  detailed 
information  collected  during  the  validation.  The  reference  is  made  up 
of  the  routine  name  followed  by  an  A or  P (A  for  compile  time  or  syntax 
error  and  B for  execution  time  or  semantic  error)  and  a number  which  makes 
the  error  unique  in  Appendix  A. 


Example: 


2.1  Nucleus  Level  1 

\ 


Operational  symbols:  S V P 11-21 

p.1.9  

• The  sealini?  character  'P'  is  not  permitted  In  a 

• PICTURE  character-strlne. 

• (KC101.A.2) 


2.2  Sequential  I-O  Level  1 

2.1.9  represents  the  ninth  error  for  Nucleus  Level  1 

11-21  represents  the  pa^e  in  X?. 23-197^  where  the  language 
element  is  defined 

• Boxes  the  description  of  the  error/deviation 

NC101.A,2  represents: 

Program  name  - UC101 

Syntax  error  - A 
second  error  - 2 


\ 

2.1  NUCLEUS  LEVEL  1 


Languaiace  Concepts 1-75 

Characters  used  for  words 1-76 

0,  1,  .*>•  9 
A,  B,  . . . , Z 
- (hyphen  or  minus) 

Characters  used  for  punctuation 1-65 


" quotation  nark 
( left  parenthesis 
) right  parenthesis 
. period 
space 

s equal  sign 

Characters  used  in  editing 1-58 

B space 

0 zero 

* plus 
- minus 
CB  credit 
DP  debit 

Z zero  suppress 

• check  protect 
$ currency  sign 

1 coniine 

. period 
/ stroke 


Separators 1-75 

The  separators,  semicolon  and  comma,  are  not 

allowed 17-1 

Character-strings  1-76 

COBOL  words 1-76 

Not  more  than  ?0  characters 

User-defined  words 1-76 

data-name 


Must  begin  with  an  alphabetic  character  II- 1 

Must  be  unioue;  may  not  be  qualified.  . II-1 

level-number 
mnemonic-name 
paragraph-name 
program-name 
routine-name 
section-name 

2.1.1  

• Null  SECTIONS  are  not  permitted  in  the  PROCEDURE  DIVISION. 

• {KC11H.A.1,  NC160.A.1,  SC20U.A.1,  ST201.A.1) 


System-names 1-78 

computer-name 

implementor-name 

language-name 

Reserved  words - 1-79 

Key  words 
Optional  words 

Figurative  constants 1-80 

ZERO 
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SPACE 

HIGH-VALUE 

LOW-VALUE 

QUOTE 

Special-character  words  1-80 

Literals 1-80 


Nonnumeric  literals  have  lengths  from  1 
through  IPO  characters 

Numeric  literals  have  lengths  from  1 through 


18  digits 

PICTURE  character-strings  1-82 

Comment-entries  1-82 

Reference  Format 1-105 

Secuence  number  1-105 

Area  A 1-105 

Division  header  1-106 

Section  header 1-106 

Paragraph  header 1-107 

Data  Division  entries  1-107 

Area  B 1-105 

Paragraphs 1-107 

Data  Division  entries  1-107 

Continuation  of  lines  1-106 

Only  nonnumeric  literals  may  be  continued  . . II-1 

Comment  lines  1-108 

Asterisk  (*)  comment  lines 
Stroke  (/)  comment  line 
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Identification  Division 1-9*1 

The  PROGRAM-ID  paragraph II-3 

The  AUTHOR  paragraph II-2 

The  INSTALLATION  paragraph II-2 

The  DATE-WRITTEN  paragraph II-2 

The  SECURITY  paragraph II-2 

Environment  Division 1-95 

The  SOURCE-COMPUTER  paragraph  II-5 

computer-name 

The  OBJECT-COMPUTER  paragraph  II-6 

computer-name 

MEMORY  SIZE  clause 

PROGRAM  COLLATING  SF.CUF.HCE  clause 

The  SPECIAL-NAMES  paragrach  I I -8 

imolementor-name  IS  mnemonic-name 


implementpr-name  IS  mnemonic-name  series 
ON  status' 

OFF  STATUS 
alphabet-name  clause 
CURRENCY  SIGN  clause 
DECIMAL-POINT  clause 


Data  Division 1-97 

Working-Storage  Section  11-11 

The  data  description  entry 11-12 

The  PLANK  WHEN  ZERO  clause 11-1*1 

The  data-name  or  FILLER  clause 11-15 
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The  JUSTIFIED  clause  (nay  be  abbreviated  JUST).  11-16 

Level-number 11-17 

01  through  10  (level  numbers  must  be  ? ditjits)  11-13 

77 11-11 

The  PICTURE  clause  (nay  be  abbreviated  PIC)  . . II-IR 
Character-string  may  contain  30  characters.  . II-lR 

Data  characters:  AX9  II-18  . 

Operational  symbols;  S V P 11-21 

2.1.2  — - 


• Data  items  with  PICTURE  S9P(17)  are  not  recognized  as  integers. 

• (KC11i|.A.2) 


Fixed  insertion  characters 11-21 

0 (may  be  used  only  in  edited  items) 

• 

B (may  be  used  only  in  edited  items) 

• 

$ (currency  sign) 

♦ and  - 
DB  and  CR 
/ 

Replacement  or  floating  characters 11-21 

$ (currency  sign) 

♦ and  - 
Z 


Currency  sign  substitution 11-21 

Decimal  point  substitution 11-21 

The  REDEFINES  clause  (nay  not  be  nested).  . . . 11-27 

The  .SIOM  clause 11-31 

2.1.3  - 


• The  clause  SIGN  IS  TRAILING  SEPARATE  or  SIGN  IS  TRAILING  SEPARATE 

• CHARACTER  are  not  implemented. 

• (NC116.A.1.  NC160.A.1,  NC217.A.1,  NC217.P.1,  TH111.A.1) 


The  SYNCHRONIZED  clause  (may  be  abbreviated  SYNC)  11-33 


The  USAGE  clause 11-35 

COMPUTATIONAL  (may  be  abbreviated  CQ^P) 

DISPLAY 

The  VALUE  clause 11-36 

literal 


2.1.»l 


Procedure  Division 1-99 

Conditional  expressions II-*I1 

Simple  condition II-*I1 

Relation  condition II-^»1 


Relational  operators 
[NOT]  GREATER  THAN 
[NOT]  LESS  THAN 
[NOT]  ECUAL  TO 


Comparison  of  numeric  operands II-I12 

Comparison  of  nonnumeric  operands  (oper- 
ands must  be  of  equal  size) 11-42 


• Signed  numeric  elementary  ite'ms  are  not  treated  as  if  they  are  moved 
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• to  elpinentary  alphanumeric  items  of  the  same  size  to  strip  the 

• operational  sii^ns  before  the  actual  comparison  of  operands  takes 

• place. 

• (NC103.B.1,  NC11U.B.1,  NCI60.B.I) 


Class  condition 11-43  . 

HOT  option 

Switch-status  condition  11-44 

The  arithmetic  statements  11-51 

Arithmetic  operands  limited  to  18  dii;its 
Overlapping?  operands 11-51 


The  ACCEPT  statement  (only  one  transfer  of  data)  11-53 
2.1.5  

• Leadino;  spaces  are  truncated  from  data  ACCEPTed  from  the  SPO. 

• (NCIO9.B.I,  NC158.E.1,  HC204.B.1) 


The  ADD  statement  

Identifier/literal  series 
TO  identifier 
GIVIHG  identifier 
POUNDED  phrase 
SIZE  EPROR  phrase 

The  ALTER  statement  (only  one  procedure-name).  . 

The  DISPLAY  statement  (only  one  transfer  of  data) 

The  DIVIDE  statement  

INTO  identifier 
BY  identifier/literal 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 

The  ENTER  statement  

The  EXIT  statement 

The  GO  TO  statement  (procedure-name  is  required) 
DEPENDING  ON  phrase 

The  IF  statement  (statements  must  be  imperative) 
ELSE  phrase 

The  INSPECT  statement  (only  single  character 

data  item)  

TALLYING  phrase 
ALL 

LEADING 
CHARACTERS 
REPLACING  phrase 
ALL 

LEADING 

FIRST 

CHARACTERS 

TALLYING  and  REPLACING  phrases 

The  MOVE  statement  

TO  identifier 
identifier  series 

The  MULTIPLY  statement  

BY  identifier 
GIVING  identifier 
ROUNDED  phrase 


11-55 


11-57 

11-59 

11-61 


11-63 

11-64 

11-65 

11-66 


11-68 


11-74 

11-77 


» 
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T 

SIZE  ERROR  phrase 

> • The  PERFORM  statement 11-78 

procedure-name 
THRU  phrase 
TIMES  phrase 

The  STOP  statement 11-85 

literal 

RUN 

The  SUBTRACT  statement  11-89 

Identic ier/literal  series 
FROM  identifier 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 


2.?  NUCLEUS  LEVEL  ? 


2.2.1 


2.2.2 


All  elements  of  1 MUC  1,2  are  a part  of  2 NUC  1,2 


Lanc^uaee  Concepts 1-75 

Characters  used  for  punctuation 1-65 


• Comma  and  semicolon  should  be  interchangeable.  They  are  not  fully 

• interchangeable  in  this  compiler.  Comma  is  not  allowed  in  the 

• DATA  DIVISION.  Comma  is  not  allowed  between  Alphabet-name  clauses 

• in  the  SPECIAL-NAMES  paragraph. 

• (MC21?.A.1,  NC215.A.1) 


, comma 

; semicolon 

Characters  used  for  arithmetic  operations 1-52 

+ addition 

subtraction 
• multiplication 

/ division 

*•  exponentiation 


Characters  used  in  relations T-66 

= equal  to 

> greater  than 

< less  than 

Separators 1-75 

The  separators,  semicolon  and  comma,  are  allowed  . . II-1 

Character-strings 1-76 

COBOL  words 1-76 

User-defined  words  1-76 


condition-name 

data-name 

Need  not  begin  with  an  alphabetic  character.  . II-1 
May  be  qualified  if  necessary  for  uniqueness  . II-1 


Reserved  words  1-79 

Figurative  constants  I-80 


ZEROS;  ZEROES 

SPACES 

HIGH-VALUES 

LOW- VALUES 

QUOTES 

ALL  literal 

Connectives 1-79 

Qualifier  connectives:  OF,  IN 
Series  connectives:  , (separator  comma) 
and  ; (.separator  semicolon) 

Logical  connectives:  AND,  OR,  AND  HOT,  OR  NOT 


Qualification  I-P7 

Reference  format  1-105 

Continuation  of  lines  (continuation  of  words  and 

numeric  literals  is  allowed)  II-1 

Identification  Division 1-9*1 

The  DATE-COMPILED  paraeraph II-*» 
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• Comment  entries  in  the  DATE-COMPILED  parae;raph  that  are  not  formal 

• comment  lines,  are  not  replaced  by  the  current  date  on  which  the 

• source  program  is  compiled. 

• (NC203.A.1) 


Environment  Division 

The  SPECIAL-HAMES  paragraph II-8 

alphabet-name  clause 

2.2.3  

• The  figurative  constants  LOV'-VALUE,  HIGH-VALUF,  QUOTE,  and  SPACES 

• are  not  allowed  in  literals  in  the  Alphabet-name  clause. 

• (KC21i».A.1) 


literal 


Data  Division 1-97 

The  data  description  entry 11-12 

Level-number  11-17 

01  through  (level-numbers  may  be  1 or  2 digits)  . 

66 

88 

The  FEDEFINES  clause  (may  be  nested) 11-27 

The  RENAMES  clause  (may  be  nested) 11-29 

data-name 

data-name  THRU  data-name 

The  VALUE  clause 11-36 


literal-1,  literal-2 
literal- 1 THRU  literal-2 
literal  range  series 


Procedure  Division  1-99 

Arithmetic  expressions  11-39 

Conditional  expressions II-Hl 

Simple  condition  II-lJI 

Relational  condition  II-Ul 


Relational  operators 
[NOT]  = 

[NOT]  > 

[NOT]  < 

Comparison  of  nonnumeric  operands  (operands  of 


unequal  sire  are  allowed) II-*12 

Condition-name  condition lI-*»4 

Sign  condition II-4U 

NOT  option 

Complex  condition 11-45 

Logical  operators  AND,  OR,  and  NOT 

Negated  simple  condition  11-46 

Combined  and  negated  combined  conditions  11-46 

Abbreviated  combined  relation  condition 11-47 

Multiple  results  in  arithmetic  statements 11-51 

The  ACCEPT  .statement  (no  restrictions  on  the  number 

of  transfers  of  data) 11-53 

FROM  phrase 

The  ADD  statement.  , . . ’ 11-55 
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TO  identifier  series 
GIVING  identifier  series 
CORRFSPONDING  phrase 

The  ALTER  statement 11-57 

The  series  option  is  allowed 

The  COMPUTE  statement 11-58 

Identifier  series 
FOUNDED  phrase 
SIZE  ERROR  phrase 

The  DISPLAY  statement  (no  restrictions  on  the  number 


of  transfers  of  data) 11-59 

UPON  phrase 

The  DIVIDE  statement  II-61 

INTO  identifier  series 
GIVING  identifier  series 
REMAINDER  phrase 

The  GO  TO  statement  (procedure-name  nay  be  omitted).  . 11-65 

The  IF  statement  (nested  statements)  11-66 

The  INSPECT  statement  (multi-character  data  items)  . . 11-68 

series 

2.2.H  


• Incorrect  totals  are  y,iver.  for  the  INSPECT  TALLYING  statement  with 

• multiple  BEFORE  and  AFTER  phrases. 

• (NCP16.R.1) 


• The  operational  sign  in  an  INSPECT  TALLYING  statement  is  not  ignored 

• when  using  signed  numeric  data  as  the  field  that  is  inspected. 

• (NC216.P.?) 


The  MOVE  statement II-T** 

CORRESPONDING  phrase 

The  MULTIPLY  statement  11-77 

BY  identifier  series 
GIVING  identifier  series 

The  PERFORM  statement 11-78 

UNTIL  phrase 
VARYING  phrase 

The  STRING  statement  11-86 

DELIMITED  series 
POINTER  phrase 
OH  OVERFLOW  phrase 

The  SUBTRACT  statement  11-89 

FROM  identifier  series 
GIVING  identifier  ."eries 
CORRESPONDING  phrase 

The  UNSTRING  statement  11-91 

DELIMITED  PY  phrase 

2. P.6  - - - i 


.•  There  Is  a problem  with  the  UNSTRING  statement  v/hen  the  DELIMITED  PY  ^ 

• ALL  ZERO,  or  ALL  "0"  or  ALL  data-name  (with  sero  value)  phrases  are  j 

• used  with  the  DELIMITER  IN  phrase.  The  receiving  field  in  the  { 

• DELIMITER  IN  phrase  should  contain  a single  left  Justified  zero  with  | 

• the  remainder  of  the  field  blank  filled  when  one  or  a contiguous  string  | 

• of  the  delimiter  is  found.  ’ . 

4 
I 

! 
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(NC218.B.  1) 


POINTER  phrase 
TALLYING  phrase 
ON  OVERFLOW  phrase 


r 


2.3  TAFLE  HANDLING  LEVEL  1 


Languafre  Concepts 

User-defined  words 1-76 

index-name 

Subscripting^  - ? levels 1-89 

Indexing  - 3 levels 1-89* 

Data  Division 

The  OCCURS  clause III-2 

integer  TIMES 

INDEXED  BY  index-name  series 

2.3.1  — 


• If  an  INDEXED  BY  phrase  appears  at  the  group  level,  “very  elementary 

• level  within  the  group  requires  an  INDEXED  BY  phrase  in  this  compiler. 

• (TH109.A.1) 


The  USAGE  IS  INDEX  clause III-5 

Procedure  Division 

Relation  conditions  III-6 

Comparisons  involving  index-names  and/or 
index  data  items 

Overlapping  operands III-6 

The  SET  statement III-11 

index-name/identifier  series 
index-name 

UP  BY  identificr/integer 
DOWN  BY  identifier/integer 
index-name  series 


2.K  TABLE  HANDLING  LEVEL  2 


All  elements  of  1 TBL  1,2  are  a part  of  2 TBL  1,2 
Data  Division 

The  OCCURS  clause I1I-2 

integer- 1 TO  integer-2  DEPENDING  ON  data-name 
ASCEMDIHG/DESCENDING  data-nane 
data-nane  series 
ASCENDING/DESCENDING  series 


Procedure  Division 

The  SEARCH  statement III-7 

VARYING  phrase 
AT  END  phrase 
WHEN  phrase 

The  SEARCH  ALL  statement III-7 

AT  END  phrase 
WHEN  phrase 


?.5  SEQUENTIAL  I-O  LEVEL  1 
Language  Concepts 

User-defined  words  .........  1-76 

file-name 

record-name 

I-O  status IV-1 

Environment  Division 

The  FILE-CONTROL  paragraph  IV-4 

The  file  control  entry IV-M 

SELECT  clause 

ASSIGN  TO  implementor-name  clause 
ORGANIZATION  IS  SEQUENTIAL  clause 
ACCESS  MODE  IS  SEQUENTIAL  clause 
FILE  STATUS  clause 

The  I-O-CONTROL  paragraph IV-6 

RERUN  clause 
SAME  AREA  clause 
SAME  AREA  series 

• 

Data  Division 

File  Section IV-9 

The  file  description  entry IV-10 

The  record  description  entry  IV-9 

The  FLOCK  CONTAINS  clause IV- 11 

" integer  CHARACTERS 

integer  RECORDS 

The  CODE-SET  clause IV- 12 

The  DATA  RECORDS  clause IV-1? 

data-name 
data-name  series 

The  LABFL  RECORDS  clause IV- 111 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause  IV-IR 

integer- 1 TO  integer-2  CHARACTERS 

The  VALUE  OF  clause IV-19 

implementor-name  IS  literal 
implementor-name  IS  literal  series 

Procedure  Division 

The  CLOSE  statement  (only  a single  file-name  may  appear 

in  a CLOSE  statement) IV-20 

REEL 

UNIT 

The  OPEN  statement  (only  a single  file-name  may  appear 

in  an  OPEN  statement) 1V-2U 

INPUT 

OUTPUT 

I-O 

The  READ  statement IV-28 

INTO  identifier 
AT  END  phrase 

The  REWRITE  statement IV-?1 

FROM  identifier 

The  USE  statement IV-32 

‘ » 
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EXCEPTION/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  I-O 

The  WRITE  statement IV-3>I 

FROM  identifier 
BEFORE/AFTER  integer  LINES 


• There  is  a line  spacing  problem  v;ith  WRITE  AFTER  ADVANCING  integer 

• LINES  clause. 

• (S0101.B.1,  S0151.B.1) 


BEFORE/AFTER  PAGE 
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2.6  SEQUENTIAL  I-O  LEVEL  2 


All  elements  of  1 SEO  1,2  are  a part  of  2 SEO  1,2 


Language  Concepts 
Special  register  . 
LIKACE-COUMTER. 


1-80 

IV-3 


Environment  Division 

The  FILE-CONTROL  paragraph  IV-4 

The  file  control  entry IV-1l 

SELECT  clause 

OPTIONAL  phrase 

RESERVE  integer  AFEA(S)  clause 

The  I-O-CONTROL  paragraph IV-6 

SAME  RECORD  AREA  clause 
SAME  RECORD  AREA  series 
MULTIPLE  FILE  TAPE  clause 


Data  Division 

The  file  description  entry IV-10 

The  FLOCK  CONTAINS  clause  IV-11 

integer- 1 TO  integer-2  RECORDS 
integer- 1 TO  integcr-2  CHARACTERS 

The  LINAGE  clause IV-15 

2.6,1  - 


• Extra  blank  lines  appear  after  the  last  line  of  a logical  page 

• and  the  first  line  on  the  next  logical  page. 

• (S0213.P.1,  SC'21U.P.1) 


FOOTING  phrase 
TOP  phrase 
BOTTOM  phrase 

The  VALUE  OF  clause IV-19 

implementor-name  is  data-name 
implementor-name  IS  data-name  series 

Procedure  Division 

The  CLOSE  statement IV-20 

NO  REWIND,  REMOVAL,  or  LOCK 
file-name  series 

The  OPEN  statement IV-2*1 


INPUT 

REVERSED 
NO  REWIND 
OUTPUT 

NO  REWIND 
EXTEND 

file-name  series 

INPUT,  OUTPUT,  I-O,  and  EXTEND  scries 

The  USE  statement IV-32 

EXCEPTION/ERROR  PROCEDURE  ON  file-name  scries 
EXCEPTION/ERROR  PROCEDURE  ON  EXTEND 

2.6.2  - 

• The  EXTEND  option  is  not  implemented. 

• (S0218.A.1) 


1 

I 

r 

% 


27 
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IV-3*« 


The  WRITE  statement  

BEFCRE/AFTER  identifier  LINES 
PEFORE/AFTER  nnemonic-name 
AT  END-OF-PAGE  imperative-statement 


r 


f 


2.7  RELATIVE  I-O  LEVEL  1 

2.7.1  - - 

• The  Relative  I-O  Module  Level  1 is  not  Implemented. 


Lan^uap.e  Concepts 

User-defined  words 1-76 

file-name 

record-name 

I-O  status V-2 

Environment  Division 

The  FILE-CONTROL  paragraph V-5 

The  file  control  entry V-5 

SELECT  clause 


ASSIGN  TO  implementor-name  clause 
ORGANIZATION  IS  RELATIVE  clause 
ACCESS  MODE  clause 
SEQUENTIAL 
RANDOM 

FILE  STATUS  clause 

The  I-O-CONTROL  paragraph  V-7 

RERUN  clause 
SAME  AREA  clause 
.SAME  AREA  series 


Data  Division 

File  Section V-10 

The  file  description  entry V-11 

The  record  description  entry V-10 

The  BLOCK  CONTAINS  clause  V-12 

integer  CHARACTERS 
integer  RECORDS 

The  DATA.  RECORDS  clause V-1? 

data-name 
data-name  series 

The  LAPEL  RECORDS  clause V-I^l 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause V-15 

integer- 1 TO  integer-2  CHARACTERS 

The  VALUE  OF  clause V-l6 

lraplc.nentor-nane  IS  literal 


Implrmentor-name  IS  literal  series 
Procedure  Division 

The  CLOSE  statement  ........  V-17 

WITH  LOCK 
file-name  series 

The  DELETE  statement V-19 

INVALID  KEY  phrase 

The  OPEN  statement V-20 

INPUT 

I OUTPUT 

I-O 

file-name  series 
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INPUT,  OUTPUT,  and  I-O  series 

The  BEAD  statement •• V-23 

INTO  identifier 
AT  END  phrase 
INVALID  KEY  phrase 

The  REVRITE  statement  V-26 

FROM  identifier 
INVALID  KEY  phrase 

The  USE  statement V-30 

EXCEPTION/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  I-O 

The  WRITE  statement V-32 

FROM  identifier 
INVALID  KEY  phrase 


2.8  RELATIVE  1-0  LEVEL  2 


2.8.1  

• The  Relative  1-0  Module  Level  2 is  not  implemented. 


All  elements  of  1 REL  0,2  are  a part  of  2 REL  0,2 


Environment  Division 

The  FILE-CONTROL  parar^raph V-5 

The  file  control  entry V-5 

SELECT  clause 

RESERVE  inte5;er  APEA(S)  clause 
ACCESS  MODE  IS  DYNAMIC  clause 

The  I-O-CONTROL  paragraph  V-7 

SAME  RECORD  AREA 

SAME  RECORD  AREA  entries 


Data  Division 

The  file  description  entry V-11 

The  BLOCK  CONTAINS  clause  V-12 

integer- 1 TO  integer-2  RECORDS 
integer- 1 TO  integer-2  CHARACTERS 

The  VALUE  OE  clause V-l6 

implementor-name  IS  data-name 
implementor-name  IS  data-name  entries 

Procedure  Division 

The  READ  statement V-23 

NEXT  RECORD 

The  START  statement V-28 

KEY  IS  phrase 
INVALID  KEY  phrase 

The  USE  statement V-?0 

EXCEPTION/EPROR  PROCEDURE 
ON  file-name  series 


1 


» 


2.9  INDEXED  I-O  LEVEL  1 


Lani^uage  Concepts 

User-defined  words 1-76 

file-name 

record-name 

I-O  status.  VI-2 

Environment  Division 

The  FILE-CONTROL  paragraph VI-5 

The  file  control  entry VI-5 


SELECT  clause 

ASSIGN  TO  implementor-name  clause 
ORGANIZATION  IS  INDEXED  clause 
ACCESS  MODE  clause 
SECUENTIAL 
RANDOM 

RECORD  KEY  clause 
FILE  STATUS  clause 

The  I-O-CCNTROL  paragraph VI-8 

RERUN  clause 
SAME  AREA  clause 
SAME  AREA  series 


Data  Division 

File  Section VI-ll 

The  file  description  entry VI-12 

The  record  description  entry VI- 11 

The  BLOCK  CONTAINS  clause VI- 13 

integer  CHARACTERS 
integer  RECORDS 

The  DATA  RECORDS  clause VI-I^J 

data-name 
data-name  series 

The  LABEL  RECORDS  clause VI- 15 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause VI-16 

integer- 1 TO  integer-2  CHARACTERS 

The  VALUE  OF  clause VI- 17 

implementor-name  IS  literal 
implementor-name  IS  literal  series 

Procedure  Division 

The  CLOSE  statement VI-18 

WITH  LOCK 
file-name  series 

The  DELETE  statement VI-20 

INVALID  KEY  phrase 

The  OPEN  statement VI-21 


INPUT 

OUTPUT  ’ 

I-O 

file-name  series 

INPUT,  OUTPUT,  and  I-O  series 

The  BEAD  statement VI-2U 

INTO  identifier 


I 


s 
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AT  END  phrase 
INVALID  KEY  phrase 

The  REWRITE  statement  VI-28 

FROM  identifier 
INVALID  KEY  phrase 

The  USE  statement VI-32 


EXCEPTICN/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  I-O 

The  WRITE  statement VI-3? 

FROM  identifier 
INVALID  KEY  phrase 


ll'lll  'K.Vii  ll 


2.10  INDEXED  I-O  LEVEL  2 


All  elements  of  1 TNX  0,2  are  a part  of  2 INX  0,2 


2. 10. 1 


Environment  Division 

The  FILE-COKTROL  parap;raph VI-5 

The  file  control  entry VI-5 

SELECT  clause 


RESERVE  intcfrer  AREA(S)  clause 
ACCESS  MODE  IS  DYNAMIC  clause 
ALTERNATE  RECORD  KEY  clause 
WITH  DUPLICATES  phrase 


• The  ALTERNATE  RECORD  KEY  clause  and  the  WITH  DUPLICATES  phrase 

• are  not  implemented. 

• (1X205. A.  1) 


The  I-O-CONTROL  pararraph VI-8 

SAME  RECORD  clause 
SAME  RECORD  AREA  series 


Data  Division 

The  file  description  entry VI-12 

The  BLOCK  CONTAINS  clause VI- 1? 

integer- 1 TO  interer-2  RECORDS 
integer-l  TO  intcger-2  CHARACTERS 

The  VALUE  OF  clause VI-17 

implementor-name  IS  data-name 
implem“ntor-name  IS  data-name  series 

Procedure  Division 

The  READ  statement VI-214 

KEY  IS  phrase 
NEXT  RECORD 

The  START  statement VT-?0 

KEY  IS  phrase 
INVALID  KEY  phrase 

The  USE  statement VI-?2 

EXCEPTION/ERROR  PROCEDURE 
ON  file-name  series 


» 


2.11  SORT-MERGE  LEVEL  1 


Language  Concepts 

User-defined  words 1-76 

file-name 

Environment  Division 

The  FILE-CONTROL  paragraph VlI-2 

The  file  control  entry VII-2 

SELECT  clause 

ASSIGN  TO  implementor-name  clause 
Data  Division 

File  Section VII-5 

The  sort-merge  file  description  entry VII-'S 

The  DATA  RECORDS  clause VII-6 

The  RECORD  CONTAINS  clause VII-7 

Procedure  Division 

The  RELEASE  statement  VII-12 

FROM  phrase 

The  RETURN  statement VII-13 

INTO  phrase 
AT  END  phrase 


The  SORT  statement  (only  one  SORT  statement,  a STOP 
RUN  statement,  and  any  associated  input-output 
procedures  allowed  in  the  nondeclarative 

portion  of  a program)  VII-IM 

KEY  data-name 

data-name  series 
ASCENDING  series 
DESCENDING  series 
mixed  ASCENDING/DESCENDIKG 
INPUT  PROCEDURE  phrase 
THRU 

USING  phrase 
OUTPUT  PROCEDURE  phrase 
THRU 

GIVING  phrase 
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2.12  SOFT-KERGE  LEVEL  2 


All  elements  of  1 SRT  0,2  are  a part  of  2 SRT  0,2 


Environment  Division 

The  FILE-CONTROL  parasraph VII-2 

The  file  control  entry VII-2 

SELECT  clause 

The  I-O-CONTROL  parattraph VII-3 

SAME  RECORD  AREA  clause 


SAME  SORT/SORT-MERGE  AREA  clause 

2.12.1  

• The  SAME  SORT-MERGE  AREA  clause  is  not  implemented. 

• (ST208.A.1) 


SAME  series 
Procedure  Division 

The  MERGE  statement VII-8 

2.12.2  - - — 

• The  same  sort  or  merge  file  name  cannot  be  used  for  both  sorting 

• and  merging  in  the  same  program  because  of  constraints  on  the 

• SELECT  statement;  e.g.,  ASSIGN  TO  SORT  DISK  vs.  ASSIGN  TO  MERGE  DISK. 

• (ST21H.A..1) 


KEY  data-name 

data-name  series 
ASCENDING  series 
DESCENDING  series 
mixed  A.SCENDING/DESCENDING 
COLLATING  SFOUENCE  phrase 

2.12.3  - - - — 

• The  MERGE  COLLATING  SFOUENCE  phrase  is  not  implemented. 

• (ST208.A.il) 


USING  phrase  , 

r OUTPUT  PROCEDURE  phrase 

THRU 

GIVING  phrase 

The  SORT  statement  (multiple  SORT  statements  are 

permitted) VII-14 

COLLATING  SECUENCF  phrase 

2.12.»l  — 

* The  SORT  COLLATING  SEQUENCE  phrase  is  not  implemented. 

• (ST20B.A.2) 


2.12.5  

• The  SORT  USING  file-name-series  statement  is  not  Implemented. 

• (ST208.A.3) 
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2.13  REPORT  WRITER  LEVEL  1 


Languai^e  Concept 

User-defined  words  1-76 

file-name 

report-name 

Special  ree,istcrs •. 1-80 

LINE-COUNTER  VIII-1 

PAGE-COUNTER  VIII-1 

Data  Division 

Report  Section  VIII-2 

The  file  description  entry  VIlI-3 

The  report  description  entry VIII-14 

The  report  eroup  description  entry  VIII-6 

The  FLOCK  CONTAINS  clause VlU~2k 

The  CODE  clause VIII-25 

The  CODE-SET  clause  VIII-26 

The  COLUMN  NUMEER  clause  VIII-27 

The  CONTROL  clause  VIII-28 


data-namc 
data-name  series 
FINAL 

FINAL  data-name  series 


The  data-name  clause  VIIl-30 

The  GROUP  INDICATE  clause  VIII-31 

The  LABEL  RECORDS  clause  VIII-32 

The  LINE  NUMBER  clause  VIII-?? 

intef'er 

I NEXT  PAGE 

PLUS  inteRer 

The  NEXT  GROUP  clause  VIII-35 

I integer 

> PLUS  inte<^er 

1 NEXT  PAGE 

I The  PAGE  clause VIII-36 


integer  LINES 
HEADING 
FIRST  DETAIL 
LAST  DETAIL 
FOOTING 


The  PICTURE  clause II-18 

The  RECORD  CONTAINS  clause  VIII-39 

The  REPORT  clause VIII-i»0 

report-name  series 

The  SOURCE  clause VIIl-^JI 

The  SUM  clause VIII-i)2 

UPON  data-name  series 
RESET  phrase 

The  TYPE  clause VIII-‘t«: 


REPORT  HEADING  (RH) 
PAGE  HEADING  (PH) 
CONTROL  HEADING  (CH) 
DETAIL  (DE) 

CONTROL  FOOTING  fCF) 
PACE  FOOTING  (PF) 
REPORT  FOOTING  (RF) 


The  VALUE  IS  clause II-?6 

The  VALUE  OF  clause VIII-50 

I 

Procedure  Division 

The  GENERATE  statement  VIII-51 

report-name 

data-name 

The  INITIATE  statement  VIII-53 

report-name 

The  SUPPRESS  statement VIII-5'* 

report-name 

The  TERMINATE  statement  VIII-55 

report-name  series 

The  USE  statement  VIII-56 

BEFORE  REPORTING 


2. in  SEGMENTATION  LEVEL  1 


Language  Concepts 

User-defined  words 1-76 

segment-number 

Procedure  Division 

Segment-numbers  IX-n 


Fixed  segment-number  range  0 through  49 
Non-fixed  segment-number  range  50  through  99 
All  sections  with  the  same  segment-number  must 
be  together  in  the  source  program 


2. 14, 1 


• Independent  segments  are  not  provided  in  their  initial  states 

• (SG102.E.1,  SG103.B.1,  SG201.P.1,  SG203.E.1) 


2.15  SEGMENTATION  LEVEL  2 


All  elements  of  1 SEC  0,2  are  a part  of  2 SEG  0,2 


Environment  Division 

The  OPJECT-COMPUTER  paragraph 

SEGMENT-LIMIT ' IX-5' 

Procedure  Division 

Segment-nimbers IX-M 


Sections  with  the  same  segment-number  need  not 
be  physically  contiguous  in  the  source  program 


2.16  LIBRARY  LEVEL  1 


2. 16. 1 

• The  Library  Module  Level  1 is  not  inplemented. 


Language  Concepts 

User-defined  words  1-76 

text-name 

All  divisions 

The  COPY  statement X-2 


i 

i 

I 


f 

i 

i 


All  plrments  of  1 HR  0,?  are  a part  of  2 LIB  0,2  | 

Lanj^uage  Concepts 

User-defined  words  ....  1-76  i 

library-name  | 

All  divisions  ^ 

The  COPY  statement X-2  | 

OF  library-name  » 

REPLACIKG  phrase  | 

i 


~r 


2.18  DEBUG  LEVEL  1 

r 

2.18.1  

* The  Debu<;  Module  Level  1 is  not  implemented. 


Lant^uap^e  Concepts 

Special  roj^istcrs I-80 

DEBUG-ITEM XI- 1 

Environment  Division 

The  SOURCE-COMPUTER  naravraph 

WITH  DEBUGGING  MODE  clause XI-? 

Procedure  Division 

USE  EOR  DEBUGGIUG  statement XI-*i 

procedure-name 
procedure-name  series 
ALL  PROCEDURES 

Debugt'ing  lines XI-10 


I 


2.19  DEBUG  LEVEL  2 


2.19.1  - - 

• The  DebUR  Module  Level  2 is  not  implepiented . 


All  elements  of  1 DEB  0,2  are  a part  of  2 DEB  0,2 
Procedure  Division 

USE  FOR  DEBUGGING  statement XI-** 

ALL  REFERENCES  CF  identifier  series 
file-name  scries 
cd-name  series 


2.20  INTER-PROGHAM  COMMUNICATIONS  LEVEL  1 


2.20.1  

• The  Inter-ProRram  Communications  Module  Level  1 is  not  implemented. 


Data  Division 

Linkage  Section XII-2 

Procedure  Division 

Procedure  Division  header XII-4 

U.SING  phrase 

The  CALL  statement XII-5 

literal 

USING  data-name  series 

The  EXIT  PROGRAM  statement XII-8 


2.21  INTFR-PROGRAK  COMMUNICATIONS  LFVEL  2 


2.21.1  — - — - - 

• The  Inter-Program  Communications  Module  Level  2 is  not  implemented. 


All  elements  of  1 IPC  0,2  are  a part  of  2 IPC  0,2 
Procedure  Division 

The  CALL  statement XII-5 

identifier 
ON  OVERFLOW  phrase 

The  CANCEL  statement XII-7 


2.22  COMMUNICATION  LEVEL  1 


The  COMMUNICATION  Module  is  not  currently  evaluated  as 
part  of  an  official  validation.  See  Section  1.9.?. 


Langua<;e  Concepts 

User-defined  words 1-76 

cd-name 
Data  Division 

Communication  Section  XIII-2 

The  communication  description  entry  XIIl-3 


FOR  INPUT  clause 
END  KEY 
MF,SSAGE  COUNT 
MESSAGE  DATE 
MF.SSAGE  TIME 
SYMPCLIC  OUEUE 
SYKEOLIC  SOURCE 
' SYMBOLIC  SUE-CUEUE-n 
STATUS  KEY 
TEXT  LENGTH 
FOR  OUTPUT  clause 
DESTINATION  COUNT 
DESTINATION  TABLE 
INDEXED  BY 
ERROR  KEY 

SYMBOLIC  DESTINATION 
STATUS  KEY 
TEXT  LENGTH 
Procedure  Division 


The  ACCEPT  MESSAGE  COUNT  statement XIII-12 

The  DISABLE  statement  ....  XIII- 1? 

INPUT 

OUTPUT 

KEY  identifier/literal 

The  FNAPLE  statement XIII-15 

INPUT 

OUTPUT 

KEY  Identifier/literal 

The  RECEIVE  statement  XIII-17 

MESSAGE 

INTO  Identifier 
NO  DATA  phrase 

The  SEND  statement XIII-20 


FPai  identlficr-1  WITH 
KITH  EMI 
WITH  EGI 

BEFORE/AFTER  ADVANCING 
ldcntifler-3  LINES 
integer  LINES 
mnemonic-name 
PAGE 


2.P3  COMMUNICATION  LEVEL  2 


The  COMMUNICATION  Module  is  not  currently  evaluated  as 
part  of  an  official  validation.  See  Section  1.9.3. 


All  elements  of  1 COM  0,2  are  a part  of  2 COM  0,2 
Communication  Section 

The  communication  description  entry XIII-3 

FOR  INPUT 
INITIAL 

Procedure  Division 

The  DISAP.LE  statement XIII- 13 

INPUT 

TERMINAL 

The  ENABLE  statement  XIII-15 

ll^PUT 

TERMINAL 

The  RECEIVE  statement XIII-17 

SEGMENT 

The  SEND  statement  XIII-20 

FROM  identifier-1 
WITH  identifier-2 
WITH  ESI 


U8 
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SECTION  3.  COMPILER  STATUS 


3. 1  Frderal  Standard  COBOL 

Section  1.5  explains  the  four  levels  of  Federal  Standard  COPOI.  and  their 
relation  to  American  National  Standard  COBOL.  This  section  lists  the  dis- 
crepancies described  in  Section  2 by  the  Federal  level  in  which  the  problem 
occurs.  All  errors  listed  for  a lov/er  level  are  also  errors  in  any  hi<^her 
level,  even  though  they  are  listed  only  in  the  lower  level.  The  paras;raph 
number  from  Section  2 is  used  to  reference  the  errors  in  each  Federal  level. 


3.1.1  Low  Level 


2.1.1  Null  SECTIONS  are  not  allowed. 

2.1.2  Data  items  vjith  PIC  .S9P(17)  are  not  recognized  as  integers. 

2.1.3  SIGN  IS  TRAILING  or  SION  TRAILING  SEPARATE  CHARACTER  clauses 
are  not  implemented. 

2.1.11  Operational  si'^ns  are  not  stripped  before  a comparison  of 
nonnumeric  operands  is  made. 

2.1.5  Leadini»  spaces  are  truncated  from  data  with  ACCEPT  FROM  SPO. 

2.3.1  All  elementary  items  reouire  an  INDEXED  PY  Phrase  if  one 
appears  at  the  croup  level. 

2.5.1  Extra  lines  are  provided  with  V.'RITE  AFTEP  ADVANCING  statement 

3.1.2  Lov;-Intermediate  Level 

2.7.1  The  Relative  I-O  Module  Level  1 is  not  implemented. 

2. 1*1.1  Independent  secmrr.ts  are  not  provided  in  their  initial  states 

2.16.1  The  Librarv  Module  L^vel  1 is  not  implemented. 

2.18.1  The  Debu'’  I'odule  Level  1 is  not  implemented. 

2.20.1  The  Tnter-Proitram  Communication  Module  Level  1 is  not 

implemented . 


3.1.3  Hit;h-Intcrmediate 


2.2.1  The  Comma  and  semi-colon  are  not  interchangeable. 

2.2.2  Comment  entries  are  not  replaced  in  DATE-COMPILED  parai^raph. 

2.2.3  Fii?urative  constants  are  not  allov.’ed  in  literals  in  the 
Alphabet-name  clauses. 

2.?.*l  Incorrect  totals  are  rjiven  for  the  INSPECT  TALLYING 
statement  with  multiple  PEFORE  and  AFTER  phrases. 

2.2.5  There  is  a problem  with  the  INSPECT  TALLYING  statement 
on  a sicned  numeric  field. 

2.2.6  There  is  a problem  with  the  receivinf*  field  of  the  DELIMITER 
IN  phrase  of  the  UN.STRING  statement. 

2.6.1  Extra  lines  appear  between  loy.ical  paces  with  the  LINAGE 
clause. 

2.6.2  The  EXCEPTION  PROCEDURE  OK  EXTEND  clause  is  not  implemented. 

2.8.1  The  Relative  I-O  Module  Level  2 is  not  implemented. 

2.19.1  The  Debu;;  Module  Level  2 is  not  implemented. 

2.21.1  The  Inter-Pror^ram  Communication  Module  is  not  Implemented. 

3.1.*1  Hii»h  Level 


2. 10.1 


2. 12. 1 


The  ALTERNATE  RECORD  KEY  clause  and  WITH  DUPLICATES  phrase 
are  not  implemented.. 

The  SAME  SORT-MERGE  AREA  clause  is  not  implemented. 


2.12.2  The  same  file  cannot  be  used  for  both  sorting  and  merging. 

2.12. ?  The  MERGE  COLLATING  SECUENCE  clause  is  not  implemented. 

2.12. t|  The  SORT  COLLATING  SECUENCE  clause  is  not  implemented. 

2.12.5  The  SORT  USING  file-name-series  clause  is  not  implemented. 

2.17.1  The  Library  Module  Level  2 is  not  implemented. 


3.2  American  National  Standard  COBOL 

Full  American  National  Standard  COBOL  consists  of  the  entire  set  of  language 
elements  defined  in  the  ANSI  COBOL  standard  (refer  to  1.7).  It  is  also  the 
equivalent  of  high  level  Federal  Standard  COBOL  plus  the  Report  Writer 
module.  Therefore,  this  section  lists  only  those  discrepancies  found  while 
validating  the  Report  Writer  Module. 

None 


SECTION 


SOFTWARE  ENVIRONMENT 


The  compiler  referenced  in  this  document  v;as  validated  using  the  softv/are 
environment  described  in  this  section.  V.'hcn  using  a modification  of  the 
described  environment,  the  compiler  may  or  may  not  continue  to  conform  to  the 
Standard.  It  should  be  noted  that  during  the  validation  process,  an  attempt 
is  made  to  validate  as  many  different  options  as  possible. 


The  use  of  compiler  options,  implementor-names  in  the  Environment  Division 
and  any  form  of  optimization  which  is  not  described  in  this  report  could  cause 
the  compiler  to  produce  a program  that  does  not  perform  according  to  the 
specifications  of  Standard  COBOL.  Only  th^  environment  described  in  this 
document  has  been  used  with  this  compiler  to  satisfy  the  reauirements  of  FIPS 
PUB  21-1  and  FPKP  101-??. 1305. la.  (Any  deviations  which  must  be  corrected  as 
per  the  referenced  FPMR  are  described  in  Sections  2 and  3 of  this  report.) 


1.  Options  or  parameters  used  on  the  processor  call  statement  for  the  compiler: 
The  following  options/parameter.®  were  used  during  the  validation. 


Options  specified: 

$ SET  ANSI 7^1 
USASl 
LINEINFO 
LEVEL  2 

^ OPTIMIZE  ( several  Nucleus  and  all  the  TH200  series 

routines  were  run  with  OPTIMIZE  set  on  ) 

Options  defaulted: 

See  Burroughs  COBOL  Reference  Manuals  5000656  and  50012*11 


2.  Environment  Division  implementor-names 

Printer  destined  files 

Tape  files 

Seouential  Mass-storage  files 

Random  Access  files 

Sort  files  (SD) 

Switch  names 

Not  supported  by  the  compiler. 


PRINTER 

TAPE 

100  • 300  DISK  I 

100  • 300  DISK 

i 

SORT  DISK  j 

j 
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Source  Computer  names 


.E6700/B7700 


Object  Computer  names 


B6700/P7700 


3.  Optimization.  The  compiler  nay  or  may  not  have  optimization  features. 

If  optimization  is  available  by  option,  it  was  used  durinp'  the  validation 
process  (during  a separate  execution  of  the  Compiler  Validation  System) 
to  determine  if  its  use  causes  the  compiler  to  produce  a proi^ram  which 
does  not  c?ive  the  expected  results.  If  the  optimization  is  invoked  through 
the  compiler  call  statement  then  it  is  mentioned  in  paragraph  1 above.  If 
it  is  invoked  through  the  introduction  of  syntax  in  other  than  the  Data 
and  Procedure  Divisions  of  the  soure^'  program  it  is  shovm  below.  Optimization 
which  would  require  modification  to  -he  Data  and  Procedure  Divisions  is  not 
considered  in  this  report  in  that  it  is  beyond  the  scope  of  the  use  of 
standard  COBOL  and  the  validation  process. 

The  optimization  feature  for  this  compiler  is  invoked  through  the  compiler 
call  statement.  See  1.  above.  There  was  no  differnce  in  the  execution 
of  the  programs  when  the  optimization  feature  was  invoked. 

H.  Compiler. 

Burroughs  COPOL  Version  II. 9.1 
5.  Operating  system. 

Burroughs  MCP  II. 9.1 
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SECTION  5.  ASCII  VALIDATION 


5.1 


Purpose  of  ASCII  Validation 


The  ASCII  Validation  is  performed  by  running  a sequence  of  three  CCVS7H 
programs  (SOUP,  SO1 19,  S0120)  using  special  procedures.  The  purpose  of  this 
special  run  is  to  validate  that  the  compiler/operating  system  being  tested 
is  capable  of  processing  ASCII  code  renresented  on  magnetic  tape  and 
punched  cards  that  were  produced  (in  accordance  with  the  appropriate  American 
National  Standard)  by  another  system.  There  is  also  a magnetic  tape  and  a card 
file  created  during  the  validation  which  will  be  taken  to  another  system  for 
further  processinff.  The  purpose  is  to  determine  whether  the  compiler/operating 
system  being  tested  can  also  produce  ASCII  representation  on  magnetic  tape  and 
punched  cards  which  can  be  processed  by  a another  computer  system. 


i 

i: 

j. 

i 


5.2  Applicable  ANSI  Standards 

The  ASCII  Validation  is  based  on  several  American  National  Standards  and 
presumes  their  support  by  the  compiler/operating  system  being  validated. 

These  are: 

1.  American  National  Standard  Programming  Language  COBOL  X?.2?-1Q7‘* 

- The  CODP-SET  clause  is  used  to  read  and  write  the  ASCII 
files. 

- The  PROGRAM  COLLATING  SECUF.NCE  clause  is  used  to  process  the 
data  in  ASCII  mode  as  v?ell  as  native  mode. 

- The  SIGN. . .SEPARATE  clause  is  used  for  signed  data  and  all 
data  is  in  the  DISPLAY  (character)  mode. 

2.  American  National  Standard  Code  for  Information  Interchange 
(ASCII)  X3.ii-1968.  (Note  that  this  describes  the  code,  not  the 
labeling  and  tape  recording  formats.) 

3.  American  National  Standard  Hollerith  Punched  Card  Code, 

X3. 26- 1970. 

r 

It.  American  National  Standard  Magnetic  Tape  Labels  for  Information 
Interchange,  X3. 27-1969. 

5.  American  National  Standard  Recorded  Magnetic  Tape  for  Information 
Interchange  (800  CPI,  NZRI),  x:». 22-1967. 

6.  American  National  .Standard  Recorded  Magnetic.  Tape  for  Information 
Interchange  (1600  CPI,  PR),  X?.?9-197^. 

The  language  of  the  197**  CCFOL  Standard  provides  the  capability  to  accent, 
process,  and  produce  ASCII  code.  The  ASCII  Standard  describes  the  code  insofar 
. as  the  bit  arrangement  and  configuration,  but  does  not  address  recording  tech- 
niques, record  formats  or  any  labeling  .'■cheme.  The  900  CPI,  NZRI  magnetic  tape 
recording  standard  vfss  used  to  establish  the  recording  density  and  technioues. 

• (1600  CPI,  PE  based  on  X?.?o-197?  "Recorded  Magnetic  Tape  for  Information  Inter- 

change" could  be  used  under  special  arrangements.)  The  tape  labeling  scheme 
used  in  these  tests  is  based  on  X.’. 27-1969  but  is  also  compatible  with  the 
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revision  to  that  tape  label  standard.  Only  th^  V0L1,  HDR1,  and  E0F1  labels  are 
used.  The  records  are  fixed  length  and  unblocked. 


5.3  ASCII  Validation  Process 

Durinsr  the  validation,  the  Validation  Manager  for  the  Federal  COBOL  Com- 
piler Testing  Service  uses  the  ASCII-encoded  magnetic  tape  and  card  files 
in  addition  to  the  normal  tape  files  associated  with  a validation.  For  the 
ASCII  portion  of  the  validation  th»  follov/ing  steps  are  performed: 

1.  The  tape  file  and  card  deck  (produced  on  another  computer  system) 
are  used  as  input  to  several  programs  designed  to  validate  whether 
the  system  being  validated  can  accept  and  process  the  data  as 
defined  by  the  respective  standards.  Any  changes  made  during  this 
validation  to  the  source  programs  reading  the  data  are  noted 
below  in  5.^.1. 

2.  A tape  file  and  card  file  are  produced  during  the  validation  which, 
should  prove  to  be  identical  to  the  files  described  in  1 above. 
These  two  files  are  then  processed  on  a different  computer  system 
to  determine  the  degree  to  which  the  system  being  validated  sup- 
ports the  ASCII  standard.  Any  changes  made  during  this  validation 
to  the  source  program  producing  the  data  are  noted  below  in  5.4.2. 


5.4  Results  for  This  Validation 

5.4.1.  The  E6700/P7700  systems  processed  the  card  deck,  the  ANSI  labeled 
tape,  and  the  unlabeled  tape  correctly. 

5.4.2.  The  P6700/P7700  systems  produced  an  unlabeled  ASCII  tape  and  card  deck 

I which  were  both  verified  later  as  being  correct  in  format  and  code  set. 
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APPEUDIX  A 


VALIDATION  SUMMARY  WORKING  DOCUMENT 


A-1  This  appendix  is  a workino;  paper  produced  during  the  validation 
and  docun:ents  the  results  of  the  co.npilation  and  execution  of  each  of  the 
programs  comprising  the  CCVS.  The  results  contained  herein  are  based  on 
the  use  of  the  compiler  within  the  Validation  Environment  Identified  in 
this  appendix.  This  appendix  (Validation  Summary  Working  Document)  is  not 
part  of  the  official  Validation  Summary  Report  (VSR)  and  is  not  intended 
to  reflect  in  any  way  the  compiler's  usefulness  or  degree  of  conformance 
to  the  language  specifications. 

The  reader  of  this  appendix  should  keep  in  mind  that  the  same  pro- 
blem area  may  appear  in  more  than  one  program,  but  is  considered  only  as  one 
single  discrepancy  and  as  such  is  reflected  only  once  in  the  body  of  the 
VSR.  (The  VSR  will  in  turn  only  reference  the  first  occurrence  of  the 
problem  in  the  appendix.) 

The  reference  documents  for  CCPOL  are  American  National  Standard 
Programming  Language  COBOL  (X?.2?-197‘‘) , and  Federal  Standard  COBOL 
(FIPS  PUB  21-1). 


VALIDATION  ENVIRONMENT 

COMPILER  IDENTIFICATION:  B6700/E7700  COBOL  Version  II. 9.1 

COMPUTER  SYSTEM:  Burroughs  B6700/B7700 


OPERATING  SYSTEM: 


Burroughs  MCP  I I. 9.1 


\ 

COMMUNICATION  LEVEL  1 and  LEVEL  2 

No  Communication  programs  were  run.  See  Section  1.9.?. 
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The  Inter-Pro‘?ran  Communication  module  is  not  implemented  for  this 
compiler  and  the  Inter-ProRram  Communication  programs  v;ere  not  run. 


P 


t 

V 


t 


I 


4 


J. 


1 


► 

INDEXED  I-O  LEVEL  1 
• 1X101  throuf^h  1X107 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

INDEXED  I-O  LEVEL  2 
1X201  throu«?h  IX20»» 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

1X205  through  1X208 
A.  Compilation: 

ALTERNATE  RECORD  KEY  clause  and  its  DUPLICATES  phrase  are  not 
implemented  for  this  compiler.  Statements  v.’hich  referenced  alternate 
keys  caused  fatal  diacnostic  messaies. 

P.  Execution: 

I The  tests  referencing  alternate  keys  had  to  be  deleted.  The  other 

I tests  in  prosjrams  1X205  and  1X206  executed  correctly.  Programs 

■ r 1X207  and  1X208  were  not  executed. 

I 


i 

I 


't 

t 


1 

I 


LIBRARY  LEVEL  1 and  LEVEL  2 

The  COBOL  Library  module  is  not  implemented  for  this  compiler  and 
the  Library  pro<^rams  were  not  run. 


> 

1 

( 

4 
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i-it'Skki.'..: 


NUCLEUS  LEVEL  1 


NC101  through  NC102 

4 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

NC103 

A.  Compilation: 

No  errors. 

B.  Execution: 

IF-TFST-65  hid  not  execute  correctly.  This  test  is  a comparison 
of  nonnumeric  operands  in  which  one  of  the  operands  is  a signed 
numeric  elementary  item.  The  operational  sign  should  not  participate 
in  the  comparison  because  the  numeric  operand  is  treated  as  though 
it  were  moved  to  an  elementary  alphanumeric  data  item  of  the  same  size 
and  the  contents  of  this  alphanumeric  data  item  were  then  compared  to 
the  nonnumeric  operand.  (.See  5.2. 1.1.?  a.  Pare  II-i)2  and  5.15.**  (**)  a. 
Page  11-75). 

NC104  through  NClOS 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

NCI  09 

A.  Compilation: 

No  errors. 

B.  Execution: 

1.  ACC-TEST-6  accepts  20  characters  from  the  SPO  (standard  console 
. ACCEPT  and  DISPLAY  device)  and  compares  the  characters  it  has 
ACCEPTed  into  an  elementary  item  PIC  A(20)  with  another  elementary 
item  PIC  A(20).  The  fields  did  not  compare  equal  because  the 
leading  space  was  truncated  from  the  characters  transmitted  from 
the  SPO. 


1 


p 


i 

t 


Computed  result:  ABC  XYZ  . 

Expected  result:  ABC  XYZ  . 

! 

2.  ACC-TEST-7  accepts  Q characters  from  the  SPO  into  an  elementary 
numeric  item  PIC  ^'(9)  then  compares  this  item  with  another 
elementary  numeric  item  PIC  o(9)  value  0123*^‘'67P.  The  fields 
did  not  compare  equal.  It  is  important  to  understand  that  a .total 
of  ten  (10)  characters  were  transmitted  from  the  SPO.  When  the 
transferred  data  exceeds  tho  size  of  the  receivinp;  item,  only  the 
leftmost  characters  of  the  data  are  .stored  in  the  receiving  data 
item. 

See  Page  II-5'<  ('I)  b.  The  ACCEPT  Statement. 

NC110  through  NC1 13 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

NC11M 

A.  Compilation: 

1.  Null  SECTIONS  are  not  allowed  by  this  implementation  of  the  compiler. 

All  instances  of  a null  .section  had  to  be  deleted. 

033700*  NULL1-HU-L-TEST-13 
033800  0 SECTION. 

033900  KULL1  SECTION. 

03^000  NU-L  SECTION 

2.  ELEH-MOVE-TEST-1^^  and  ELEM-MOVE-TE.ST-17  had  to  be  deleted.  The  sending 
item  in  each  of  these  tests  had  the  following  description: 

r 01M300  01  WRK-DS-LS-1P17-1  PIC  S9P(17)  SIGN  LEADING  SEPARATE 

OlttHOO  CHARACTER  VALUE  -100000000000000000. 

The  compiler  issued  the  message  SENDING  ITEM  IS  NOT  AN  INTEGER  for 
both  of  these  tests. 

B.  Execution: 

IF-EOUAL-TEST-I*;  did  not  produce  the  expected  results.  This  test  is 
a comparison  of  nonnureric  operands  where  one  of  the  operands  is  a 
signed  nun»*rie  data  item.  The  operational  sign  should  not  participate 
in  the  comparison.  ( See  NC103.  ) t 

KC115  I 

A.  Compilation:  | 

No  errors. 

} 
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B.  Execution: 


No  errors. 

NC1 16  through  NC120 

A.  Compi lotion: 

The  coT.piler  issued  the  nossage  CONSTRUCT  NOT  IMPLEMENTED  whenever 
the  following  descriptions  were  used: 

SIGN  IS  TRAILING  SEPARATE 

SIGN  IS  TRAILING  SEPARATE  CHARACTER 

All  such  statements  were  changed  to: 

SIGN  IS  TRAILING. 

B.  Execution: 

Tests  in  NC1 16  which  were  related  directly  to  SIGN  TRAILING  SEPARATE 
CHARACTER  failed.  The  other  tests  in  these  programs  executed 
correctly. 

HC151  through  NC157 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

NCISS 

A.  Compilation; 

r No  errors. 

B.  Execution; 

ACC-TEST-6  fails  because  the  leading  SPACE  is  truncated  as  in  NC109. 

NC159 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

NCI  60 


» 
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A.  Compilation: 

Null  SECTIONS  and  Instances  of  SIGN  IS  TRAILING  SEPARATE  CHARACTER 
caused  fatal  dia(?nostics  and  had  to  be  deleted  or  changed  - same  as 
NC11*I  and  NC116  thru  1IC120. 

B.  Execution: 

IF-EOUAL-TEST-15  fails.  This  is  the  sane  test  as  in  HC11i<. 

NCI61  through  NC165 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

NUCLEUS  LEVEL  2 . 

NC201  through  NC202 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

NC203 

A.  Compilation: 

The  co.nment  entries  that  v/ere  not  formal  comment  lines  within  the 
DATE-COMPILED  paragraph  were  not  replaced  by  a paragraph  of  the  form 

DATE-COMPILED,  current  date. 

See  2Jt  The  DATE-COMPILED  Paragraph  on  Page  Il-i). 

B.  Execution: 

No  errors. 

NC20** 

A.  Compilation; 

No  errors. 

B.  Execution. 


ACC-TEST-6  and  ACC-TEST-7  fail  as  in  NC109 


}t 


I 


f 


I 
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NC205  through  MC212 

A.  Compilation: 

No  errors.  ^ 

B.  Execution: 

No  errors. 

NC21? 

A.  Compilation: 

All  instances  of  comma  had  to  be  deleted  from  the  DATA  DIVISION. 

Comma  in  the  DATA  DIVISION  causes  the  compiler  to  issue  a fatal 
diagnostic  UNRECOGNIZED  CONSTRUCT.  The  comma  and  semicolon  are 
fully  interchangeable  whenever  they  appear  as  format  punctuation 
characters  in  various  COBOL  formats  ( 5.2. 1.8  Format  Punctuation 
Page  1-73  ). 

B.  Execution: 

No  errors. 

NC21H 

A.  Compilation: 

The  compiler  issued  the  fatal  diagnostic  UNRECOGNIZED  CONSTRUCT 

in  the  Alphabet-name  clause  because  of  the  presence  of  figurative 

constants  LOW-VALUE,  HIGH-VALUE,  CUOTE,  and  SPACES.  These  figurative 

constants  were  replaced  by  the  respective  literals:  ^ 


LOW-VALUE 

1 

HIGH-VALUE 

256 

QUOTE 

127 

SPACES 

It  It 

B.  Execution: 

No  errors. 

NC215 

A.  Compilation: 

The  compiler  issued  a fatal  diagnostic  because  comma  is  not  allowed 
as  a separator  between  Alphabet-name  clauses.  The  comma  was  deleted. 

B.  Execution: 

No  errors. 

NC216 

A.  Compilation: 
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No  errors 


B.  Execution: 

1.  INSPECT-TEST-19  is  a test  of  TALLYING  series  and  REPLACING  series 
as  shown  below: 

INSPECT  data-name  TALLYING  count- 1 FCR  ALL  "A" 

count-P  FOR  LEADING  "AH" 
count-3  FOR  CHARACTERS  BEFORE 
count-M  FOR  CHARACTERS  AFTER  "AL" 

REPLACING 

series. 

Tests  19.02,  19.03,  and  19.09  fail  with  computed  and  expected  results 
shown  below: 


19.02 


count-2 


0 - expected 


1 - computed 


19.03 

19.09 


count-3 


count-U 


13  - expected 
5 - expected 


15  - computed 
6 - computed 


Test  19  uses  Rules  5.19.9  (6),  (8),  and  (11)  on  Pa^e  IJ-71. 

2.  Test  2?. 02  ^ave  a result  of  0 when  the  expected  result  was  1 for 
count-2  in  the  INSPECT  statement  shown  below: 

INSPECT  si'^ned-numeric-data 
TALLYING  count- 1 FOR  ALL 

count- 2 FOR  ALL  "5". 

The  signed-numeric-data  used  in  the  INSPECT  statement  above  was  defined 
as  PIC  S9(5)  VALUE  -12?95. 

Rule  5.19.9  (2)  c.  describes  how  the  INSPECT  functions  with  signed 
numeric  data  - Pace  11-70.  The  operational  sign  was  not  ignored. 

Test  23.02  failed  because  the  character  "5"  was  not  found. 


NC217 


A.  Compilation: 

A SIGN  IS  TRAILING  SEPARATE  phrase  had  to  be  deleted  from  the 
description  of  a data  item  used  in  STRING-TEST- 17. 01  and  19.01 
because  the  TRAILING  SEPARATE  construct  is  not  implemented  in 
the  compiler. 

B.  Execution: 

. Deletion  of  the  SIGN  TRAILING  SEPARATE  phrase  caused  tests 
17.01  and  19.01  to  fall. 


NC218 

A.  Compilation: 

No  errors. 

B.  Execution: 

Tests  UNST-6.02,  7.02,  and  9.02  all  fail  because  of  a problem  vdth 
the  DELIMITER  IN  reccivins:-field  phrase  of  the  UNSTRIMG  statement. 
When  the  DELIMITED  PY  phrase  has  ALL  ZERO,  ALL  "0",  or  ALL  data- 
name  (with  value  7ero)  as  the  actual  delimiter;  and  the  string  beinc? 
parsed  has  more  than  one  conti'^uous  occurrence  of  zero  (000900...), 
then  the  DELIMITER  IN  reoeivinm-field  should  finally  contain  a 
single  zero  left  Justified.  The  remainder  of  the  receivin"-field 
should  be  space  filled.  See  5.21.11  Rule  (8)  Pa^e  11-92. 


RELATIVE  1-0  LEVEL  1 and  2 


The  Relative  I-O  nodule  Is  not  ioplemented- for  this  compiler  and-the 
Relative  prof^rams  were  not  run. 


r 

1 


\ 


\ 


\ 

SEGMENTATION  LEVEL  1 
SGtOI 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

SGI  02 

A.  Compilation: 

No  errors. 

B.  Execution: 

SEG-TEST-5  fails  because  independent  sefrments  are  not 
in  their  initial  state  each  time  these  sejcments  are  made 
available  to  the  pro:?ram. 

See  2.2.3  Independent  See;mcnts  Pa:?e  IX-2. 

SG103 

A.  Compilation: 

No  errors. 

B.  Execution: 


lNITIAL-STATE-TEST-1,  FALL-THRU-TEST-6,  and 
GO-TO-ALTER-IHD-TEST-7  all  fail  because  independent 
segments  are  not  provided  in  their  initial  states 
each  time  they  are  made  available  to  the  program. 
See  SGI 02. 


SG104  through  SG106 

A.  Compilation: 
No  errors. 

B.  Execution: 

No  errors. 
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SEQUENTIAL  I-O  LEVEL  1 


\ 

'\  ■ 

S0101 

A.  Compilation: 

No  errors. 

B.  Execution: 

WRT -TEST-25  and  WRT-TEST-26  both  fail.  The  seouence  of  VRITE 
statements  for  both  of  these  tests  is  as  follows: 

WRITE  AFTER  ADVANCING  1 

WRITE  blank  line  AFTER  ADVANCING  1 

WRITE  for  test-25 

WRITE  AFTER  ADVANCING  1 

WRITE  blank  line  AFTER  ADVANCING  1 

WRITE  FROM  for  test-26 

In  each  test,  the  line  in  question  should  appear  2 lines  below 
and  one  line  above  the  bracketint^  reference  lines.  The  system 
produced  the  lines  1 line  below  and  2 lines  above  the  reference 
lines  for  both  test  25  and  26. 

SQ102  through  S0121 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

50151 

A.  Compilation: 

. No  errors. 

B.  Execution: 

WRT-TEST-25  failed  the  same  as  in  S0101.  The  test  line  in  question 
was  one  line  below  and  two  above  the  reference  lines  instead  of 
two  lines  below  and  one  above  as  was  expected. 

50 152  through  SC 153 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 
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SEQUENTIAL  I-O  LEVEL  ? 


S0?01  through  S0212 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

SQ213 

A.  Compilation: 

No  errors. 

B.  Execution: 

There  is  a problem  with  the  LINAGE  clause.  An  extra  blank  line 
appears  before  the  body  of  detail  lines  in  V/RT-TEST-1,  2,  3f 
and  5. 

This  problem  appears  after  the  last  line  of  a logical  page 
end  the  first  line  on  the  next  logical  page. 

S021»i 

A.  Compilation: 

No  errors. 

B.  Execution: 

VIBT-TEST-1  fails  with  the  same  extra  blank  line  between  logical 
pages  problem  as  was  described  for  SQ213. 

SC215  through  S0217 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 


' * 
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SQ218 


A.  Compilation: 

In  the  DECLARATIVES  SECTION,  the  EXTEND  option  had  to  be  deleted 
as  this  option  is  not  implemented  in  this  compiler. 

B.  Execution: 

No  errors. 


I 


f 


f 


\ ■ - 
I 

SORT-MEFGE  LEVEL  1 
ST  101  throuflfh  ST  117 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

SORT-MERGE  LEVEL  2 
ST201 

A.  Compilation: 

A null  SECTION  had  to  be  deleted  at  line  086200.  ’ 

f 

B.  Execution:  ' 

No  errors. 

ST202  throu<th  ST207 
A.  Compilation: 

No  errors. 

P.  Execution: 

No  errors.  I 

A 

\ 

ST208  through  ST212  i 

r A 

A.  Compilation:  | 

The  following  constructs  are  not  implemented  in  this  compiler: 

1.  In  the  I-O  CONTROL  paragraph,  the  SAME  SORT-MERGE  AREA  phrase;  ^ 

2.  In  the  SORT  statement,  the  COLLATING  SECUENCE  clause; 

3.  In  the  SORT  statement,  the  SORT  USING  file  name  series;  and 
In  the  MERGE  statement,  the  COLLATING  SECUENCE  clause. 

B.  Execution:  i 

Because  of  the  nature  of  the  tests  with  regard  to  the  syntax  errors  i 

above,  programs  ST208  through  ST212  were  not  executed.  I 


T5 


ST213 


A.  Compilation: 

The  SAME  SORT-MERGE  AREA  clause  was  deleted  from  the  I-O-CONTROL 
para(;raph. 

B.  Execution: 

No  errors. 

ST2in 

A.  Compilation: 

The  X-27  card  had  to  be  changed  to  ASSIGN  the  merge  file  to  MERGE  DISK. 
The  same  file-name  cannot  be  used  as  a sort  file  and  also  as  a merge 
file  because  of  the  reouirement  that  a sort  file  is  assigned  to  SORT 
DISK  and  a merge  file  is  assigned  to  MERGE  DISK. 

B.  Execution: 

No  errors. 

ST215 

A.  Compilation: 

The  COLLATING  SECUENCE  clause  had  to  be  deleted  from  the  MERGE 
statement . 

B.  Execution: 


This  program  v;as  not  executed. 


TABLE  HAKDLING  LEVEL  1 


TH101  through  TK108 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

TH109 

A.  Compilation: 

The  compiler  requires  that  every  elementary  level  subordinate  to 
a group  item  with  an  INDEXED  PY  phrase,  must  also  contain  an 
INDEXED  BY  phrase. 

A dummy  index  had  to  be  added  to  lines  009700  and  010000  because 
of  fatal  diagnostic  messages. 

B.  Execution: 

No  errors. 

TK110 

A.  Compilation: 

No  errors. 

B.  Execution: 

No  errors. 

TH111 

A.  Compilation: 

The  SIGN  TRAILING  SEPARATE  CHARACTER  had  to  be  changed  to  SIGN  TRAILING 
because  of  a fatal  diagnostic. 

B.  Execution: 

No  errors. 

TH151  through  TH1S2 
A.  Compilation: 
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No  errors 


B.  Execution: 

No  errors. 

TABLE  HANDLING  LEVEL  2 
TH201  through  TH215 

A.  Compilation: 
No  errors. 

B.  Execution: 


No  errors 
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